home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / system / a_r10.zip / DEMO1.BAT < prev    next >
DOS Batch File  |  1994-10-12  |  1KB  |  79 lines
  1. @echo off
  2. echo off
  3.  
  4. ::Batch File for ANSIB and RAT demo #1
  5. ::  (using no ANSIB control file)
  6.  
  7. rat reset
  8. rat 9,17
  9.  
  10. :bmenu
  11. viewscn demo.scn
  12. ansib color 14,1
  13. ansib loc 4,51
  14. ansib prt "#1"
  15. ansib loc 1,1
  16. ansib color 7,0
  17.  
  18. :again
  19. rat wait
  20. if errorlevel 253 goto mouse
  21. if errorlevel  54 goto again
  22. if errorlevel  53 goto quit
  23. if errorlevel  52 goto opt4
  24. if errorlevel  51 goto opt3
  25. if errorlevel  50 goto opt2
  26. if errorlevel  49 goto opt1
  27. if errorlevel  28 goto again
  28. if errorlevel  27 goto quit 
  29. goto again
  30.  
  31. :mouse
  32.  
  33. rat 11,16,11,64
  34. if errorlevel 1 goto opt1
  35.  
  36. rat 13,16,13,64
  37. if errorlevel 1 goto opt2
  38.  
  39. rat 15,16,15,64
  40. if errorlevel 1 goto opt3
  41.  
  42. rat 17,16,17,64
  43. if errorlevel 1 goto opt4
  44.  
  45. rat 19,16,19,64
  46. if errorlevel 1 goto quit
  47.  
  48. goto again
  49.  
  50. :opt1
  51. ansib loc 11,5
  52. goto redo
  53.  
  54. :opt2
  55. ansib loc 13,5
  56. goto redo
  57.  
  58. :opt3
  59. ansib loc 15,5
  60. goto redo
  61.  
  62. :opt4
  63. ansib loc 17,5
  64.  
  65. :redo
  66. ansib color 14,3
  67. ansib prt "selected-->"
  68. ansib loc 23,25
  69. ansib prt "press any key or click mouse"
  70. ansib home
  71.  
  72. rat wait
  73. goto bmenu
  74.  
  75. :quit
  76. cls
  77. echo End of ANSIB and RAT Demo #1
  78.  
  79.